home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #4 / Amiga Plus CD - 2000 - No. 4.iso / Tools / Dev / AmigaTalk / System / SerialDevice.p < prev    next >
Encoding:
Text File  |  2000-05-03  |  3.4 KB  |  110 lines
  1. pTempVar <- <primitive 110 23 >
  2. <primitive 112 pTempVar 1  " new: " \
  3.   #( #[ 16r21 16r6A 16r20 16rF3 16rF5] \
  4.     #(  )) >
  5.  
  6. <primitive 112 pTempVar 2  " setTerminators: " \
  7.   #( #[ 16r30 16r21 16r1A 16rFA 16r03 16rE3 16rF1 16r60 16rF3 16rF5] \
  8.     #( 14  )) >
  9.  
  10. <primitive 112 pTempVar 3  " setFlags: " \
  11.   #( #[ 16r30 16r56 16r21 16r1A 16rFA 16r04 16rE3 16rF1 16r68 16rF3 16rF5 \
  12.        ] \
  13.     #( 13  )) >
  14.  
  15. <primitive 112 pTempVar 4  " setRBufSize: " \
  16.   #( #[ 16r30 16r55 16r21 16r1A 16rFA 16r04 16rE3 16rF1 16r67 16rF3 16rF5 \
  17.        ] \
  18.     #( 13  )) >
  19.  
  20. <primitive 112 pTempVar 5  " setBreakLen: " \
  21.   #( #[ 16r30 16r54 16r21 16r1A 16rFA 16r04 16rE3 16rF1 16r66 16rF3 16rF5 \
  22.        ] \
  23.     #( 13  )) >
  24.  
  25. <primitive 112 pTempVar 6  " setStops: " \
  26.   #( #[ 16r30 16r53 16r21 16r1A 16rFA 16r04 16rE3 16rF1 16r64 16rF3 16rF5 \
  27.        ] \
  28.     #( 13  )) >
  29.  
  30. <primitive 112 pTempVar 7  " setDataSize: " \
  31.   #( #[ 16r30 16r52 16r21 16r1A 16rFA 16r04 16rE3 16rF1 16r63 16rF3 16rF5 \
  32.        ] \
  33.     #( 13  )) >
  34.  
  35. <primitive 112 pTempVar 8  " setParity:status: " \
  36.   #( #[ 16r30 16r21 16r22 16r1A 16rFA 16r04 16rE3 16rF2 16rF5] \
  37.     #( 15  )) >
  38.  
  39. <primitive 112 pTempVar 9  " setBaud: " \
  40.   #( #[ 16r30 16r50 16r21 16r1A 16rFA 16r04 16rE3 16rF1 16r62 16rF3 16rF5 \
  41.        ] \
  42.     #( 13  )) >
  43.  
  44. <primitive 112 pTempVar 10  " setSyncType: " \
  45.   #( #[ 16r30 16r21 16r1A 16rFA 16r03 16rE3 16rF1 16r69 16rF3 16rF5] \
  46.     #( 12  )) >
  47.  
  48. <primitive 112 pTempVar 11  " clearReadBuffer " \
  49.   #( #[ 16r30 16r1A 16rFA 16r02 16rE3 16rF2 16rF5] \
  50.     #( 11  )) >
  51.  
  52. <primitive 112 pTempVar 12  " flush " \
  53.   #( #[ 16r30 16r1A 16rFA 16r02 16rE3 16rF2 16rF5] \
  54.     #( 10  )) >
  55.  
  56. <primitive 112 pTempVar 13  " getStatus " \
  57.   #( #[ 16r59 16r1A 16rFA 16r02 16rE3 16rF1 16r61 16rF3 16rF5] \
  58.     #(  )) >
  59.  
  60. <primitive 112 pTempVar 14  " sendBreakOfDuration: " \
  61.   #( #[ 16r58 16r21 16r1A 16rFA 16r03 16rE3 16rF2 16rF5] \
  62.     #(  )) >
  63.  
  64. <primitive 112 pTempVar 15  " restart " \
  65.   #( #[ 16r57 16r1A 16rFA 16r02 16rE3 16rF2 16rF5] \
  66.     #(  )) >
  67.  
  68. <primitive 112 pTempVar 16  " pause " \
  69.   #( #[ 16r56 16r1A 16rFA 16r02 16rE3 16rF2 16rF5] \
  70.     #(  )) >
  71.  
  72. <primitive 112 pTempVar 17  " reset " \
  73.   #( #[ 16r55 16r1A 16rFA 16r02 16rE3 16rF2 16rF5] \
  74.     #(  )) >
  75.  
  76. <primitive 112 pTempVar 18  " writeThis: " \
  77.   #( #[ 16r54 16r21 16r1A 16rFA 16r03 16rE3 16rF2 16rF5] \
  78.     #(  )) >
  79.  
  80. <primitive 112 pTempVar 19  " readSync: " \
  81.   #( #[ 16r53 16r21 16r1A 16rFA 16r03 16rE3 16rF3 16rF5] \
  82.     #(  )) >
  83.  
  84. <primitive 112 pTempVar 20  " initializeWithTerm: " \
  85.   #( #[ 16r52 16r21 16r1A 16rFA 16r03 16rE3 16rF2 16rF5] \
  86.     #(  )) >
  87.  
  88. <primitive 112 pTempVar 21  " close " \
  89.   #( #[ 16r50 16r15 16r1A 16rFA 16r03 16rE3 16rF2 16rF5] \
  90.     #(  )) >
  91.  
  92. <primitive 112 pTempVar 22  " open " \
  93.   #( #[ 16r51 16r15 16r1A 16rFA 16r03 16rE3 16rF2 16rF5] \
  94.     #(  )) >
  95.  
  96. <primitive 112 pTempVar 23  " setBufferSize: " \
  97.   #( #[ 16r21 16r65 16rF5] \
  98.     #(  )) >
  99.  
  100. <primitive 98 #SerialDevice \
  101.   <primitive 97 #SerialDevice #Device #AmigaTalk:System/SerialDevice.st \
  102.    #(  #terminators #status #baudrate #dSize #stops #bufferSize #brkLen #rBufSize \
  103.         #syncType #serialName ) \
  104.    #( #new: #setTerminators: #setFlags: #setRBufSize: #setBreakLen: #setStops:  \
  105.        #setDataSize: #setParity:status: #setBaud: #setSyncType: #clearReadBuffer #flush #getStatus  \
  106.        #sendBreakOfDuration: #restart #pause #reset #writeThis: #readSync: #initializeWithTerm: #close  \
  107.        #open #setBufferSize:  ) \
  108.   pTempVar 3 5 >>
  109.  
  110.